home *** CD-ROM | disk | FTP | other *** search
- on INITSTUFF
- global ReqPetStore, ReqMovies, ReqGrocery, ReqDrugstore, ReqDrycleaners, ReqFarm, ReqZoo, ReqGrandma, ReqSchool, ReqPark, ReqPolice, ReqAirport, RewPetStore, RewMovies, RewGrocery, RewDrugStore, RewDryCleaners, RewFarm, RewZoo, RewGrandMa, RewSchool, RewPark, RewPolice, RewAirport, LocRew, LocReq, Locations, randomized, givenList, NewCity, wagonList, visitedGro, visitedAir, visitedDry, visitedDS, visitedGMa, visitedFarm, visitedPark, visitedMovi, visitedSchool, visitedCop, visitedPet, visitedZoo, availableLocs, searchAnimal, ZooCount, parkCount, GroceryCount, CopCount, PetCount, calculatedLocs, Loc1Name, Loc2Name, loc1Rew, Loc2Rew
- set Loc1Name to EMPTY
- set Loc2Name to EMPTY
- set loc1Rew to EMPTY
- set Loc2Rew to EMPTY
- set calculatedLocs to 0
- set ZooCount to 1
- set parkCount to 1
- set GroceryCount to 1
- set CopCount to 1
- set PetCount to 1
- set searchAnimal to " "
- set wagonList to []
- set randomized to 0
- set givenList to [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- set ReqPetStore to ["money", "leash", "newsPaper", "shirt", "thermometer", "hay", "aspirin", "socks", "goldFish", "corn"]
- set ReqMovies to ["money", "shirt", "newsPaper", "ticket", "butter", "aspirin", "socks", "copPaper"]
- set ReqGrocery to ["strawberries", "money", "butter", "popcorn", "lollyPop", "apron", "hat", "newsPaper", "socks", "corn"]
- set ReqDrugstore to ["newsPaper", "pencil", "aspirin", "shirt", "money", "strawberries", "socks", "corn"]
- set ReqDrycleaners to ["newsPaper", "money", "shirt", "apron", "pencil", "aspirin", "socks"]
- set ReqFarm to ["newsPaper", "money", "butter", "strawberries", "popcorn", "shirt", "hay", "thermometer", "socks", "overalls"]
- set ReqZoo to ["hat", "newsPaper", "money", "hay", "popcorn", "shirt", "strawberries", "thermometer", "copPaper", "socks", "corn"]
- set ReqGrandma to ["newsPaper", "money", "strawberries", "flag", "shirt", "butter", "apron", "copPaper", "socks", "corn", "balloons"]
- set ReqSchool to ["hat", "money", "newsPaper", "thermometer", "flag", "pencil", "aspirin", "copPaper", "socks"]
- set ReqPark to ["money", "shirt", "newsPaper", "strawberries", "popcorn", "kite", "socks", "balloons"]
- set ReqPolice to ["hat", "newsPaper", "money", "donut", "pencil", "flag", "aspirin", "shirt", "socks"]
- set ReqAirport to ["aspirin", "newsPaper", "money", "popcorn", "strawberries", "copPaper", "pencil", "flag", "socks"]
- set RewPetStore to ["balloons", "goldFish", "thermometer", "ticket", "aspirin", "hay", "money", "newsPaper", "leash"]
- set RewMovies to ["popcorn", "money", "aspirin", "ticket", "balloons", "newsPaper", "lollyPop"]
- set RewGrocery to ["flag", "pencil", "popcorn", "kite", "money", "donut", "apron", "aspirin", "strawberries", "butter", "ticket", "thermometer", "lollyPop", "leash", "socks", "corn", "balloons"]
- set RewDrugStore to ["balloons", "socks", "leash", "thermometer", "ticket", "aspirin", "money", "kite", "pencil", "flag"]
- set RewDryCleaners to ["balloons", "overalls", "socks", "ticket", "aspirin", "apron", "money", "hat", "shirt", "newsPaper"]
- set RewFarm to ["corn", "newsPaper", "ticket", "thermometer", "butter", "strawberries", "aspirin", "hay", "money", "leash"]
- set RewZoo to ["newsPaper", "balloons", "thermometer", "hay", "popcorn", "kite", "money", "aspirin", "ticket"]
- set RewGrandMa to ["butter", "strawberries", "overalls", "corn", "goldFish", "socks", "ticket", "thermometer", "hat", "balloons", "leash", "lollyPop", "apron", "aspirin", "donut", "money", "kite", "popcorn", "shirt", "newsPaper"]
- set RewSchool to ["thermometer", "pencil", "flag", "hat", "money", "aspirin", "ticket", "newsPaper", "popcorn"]
- set RewPark to ["leash", "balloons", "popcorn", "kite", "money", "donut", "aspirin", "ticket", "newsPaper"]
- set RewPolice to ["copPaper", "hat", "money", "aspirin", "ticket", "newsPaper", "pencil"]
- set RewAirport to ["balloons", "thermometer", "flag", "kite", "money", "aspirin", "ticket", "newsPaper"]
- set LocReq to [ReqPetStore, ReqMovies, ReqGrocery, ReqDrugstore, ReqDrycleaners, ReqFarm, ReqZoo, ReqGrandma, ReqSchool, ReqPark, ReqPolice, ReqAirport]
- set LocRew to [RewPetStore, RewMovies, RewGrocery, RewDrugStore, RewDryCleaners, RewFarm, RewZoo, RewGrandMa, RewSchool, RewPark, RewPolice, RewAirport]
- set Locations to ["PetStore", "Movies", "Grocery", "DrugStore", "DryCleaners", "Farm", "Zoo", "Grandma", "School", "Park", "Police", "Airport"]
- set NewCity to Locations
- set availableLocs to Locations
- set visitedGro to 0
- set visitedAir to 0
- set visitedDry to 0
- set visitedDS to 0
- set visitedGMa to 0
- set visitedFarm to 0
- set visitedPark to 0
- set visitedMovi to 0
- set visitedSchool to 0
- set visitedCop to 0
- set visitedPet to 0
- set visitedZoo to 0
- end
-